Imports Microsoft.VisualBasic

Public Class Mail
    Private _smtpHost As String
    Private _nomCuenta As String
    Private _password As String
    Private _estado As String

    Public Sub New(ByVal smtpHost As String, ByVal nomCuenta As String, ByVal password As String, ByVal estado As String)
        Me._smtpHost = smtpHost
        Me._nomCuenta = nomCuenta
        Me._password = password
        Me._estado = estado
    End Sub

    Public Property SmtpHost() As String
        Get
            Return _smtpHost
        End Get

        Set(ByVal value As String)
            _smtpHost = value
        End Set
    End Property

    Public Property NomCuenta() As String
        Get
            Return _nomCuenta
        End Get

        Set(ByVal value As String)
            _nomCuenta = value
        End Set
    End Property

    Public Property Password() As String
        Get
            Return _password
        End Get

        Set(ByVal value As String)
            _password = value
        End Set
    End Property

    Public Property Estado() As String
        Get
            Return _estado
        End Get

        Set(ByVal value As String)
            _estado = value
        End Set
    End Property

End Class
